home *** CD-ROM | disk | FTP | other *** search
/ PC Shareware 1997 February / PC Shareware 1997-02.iso / programy / vca / _setup.1 / Virus Checking Assistant.exe / 0 / RCDATA / TGETDIRECTORY / TGETDIRECTORY.txt
Text File  |  1996-07-05  |  1KB  |  67 lines
  1. object GetDirectory: TGetDirectory
  2.   Left = 200
  3.   Top = 108
  4.   BorderIcons = [biSystemMenu]
  5.   BorderStyle = bsDialog
  6.   Caption = 'Get Full Path Name'
  7.   ClientHeight = 183
  8.   ClientWidth = 222
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   Position = poScreenCenter
  14.   PixelsPerInch = 96
  15.   TextHeight = 13
  16.   object Bevel1: TBevel
  17.     Left = 12
  18.     Top = 8
  19.     Width = 199
  20.     Height = 137
  21.   end
  22.   object DriveComboBox1: TDriveComboBox
  23.     Left = 23
  24.     Top = 114
  25.     Width = 138
  26.     Height = 19
  27.     TabOrder = 0
  28.     OnChange = DriveComboBox1Change
  29.   end
  30.   object DirectoryListBox1: TDirectoryListBox
  31.     Left = 23
  32.     Top = 15
  33.     Width = 176
  34.     Height = 92
  35.     ItemHeight = 16
  36.     TabOrder = 1
  37.   end
  38.   object BitBtn1: TBitBtn
  39.     Left = 34
  40.     Top = 152
  41.     Width = 71
  42.     Height = 23
  43.     TabOrder = 2
  44.     OnClick = BitBtn1Click
  45.     Kind = bkOK
  46.   end
  47.   object BitBtn2: TBitBtn
  48.     Left = 118
  49.     Top = 152
  50.     Width = 71
  51.     Height = 23
  52.     TabOrder = 3
  53.     Kind = bkCancel
  54.   end
  55.   object Scaler1: TScaler
  56.     PixelsPerInch = 96
  57.     Xdevelop = 640
  58.     Ydevelop = 480
  59.     ClientWidth = 222
  60.     ClientHeight = 183
  61.     LimitScale = No
  62.     ScaleRuntime = False
  63.     Left = 176
  64.     Top = 128
  65.   end
  66. end
  67.